home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ MSO2003 OTL Temp Folder.xpl < prev    next >
Text File  |  2004-01-26  |  2KB  |  53 lines

  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="4"
  3. "COUNT"="1"
  4. "UIPATH"="Program Options\Microsoft Office\MS Office 2003\Outlook"
  5. "NAME"="Attachment Temporary Folder"
  6. "VERSION"="1.00"
  7. "LANGUAGE"="VBScript"
  8. "TEXT 1"="Temp. Folder"
  9. "DESCRIPTION 1"="A lot of Outlook items, especially emails, have often documents attached. If you double-click an attachment, Outlook needs to save the files to your hard disk. Once this is done, it will start the associated application for the file (e.g. Excel for *.XLS files)."
  10. "DESCRIPTION 2"="By default, Outlook stores these files in a sub-folder of your Temporary Internet Files (=Internet Explorer Cache) but you can select a different folder here. "
  11. "DESCRIPTION 3"="You may also clear this field and Outlook will use a different folder below your Temporary Internet Files each time your start Outlook."
  12. "AUTHOR"="Xteq Systems"
  13. "CONTACTURL"="http://www.xteq.com"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15. "COMMENT 1"="Microsoft Knowledge Base Article - 249793 "
  16.  
  17. sPCheck="HKCU\Software\Microsoft\Office\11.0\"
  18.     sV1="HKCU\Software\Microsoft\Office\11.0\Outlook\Security\OutlookSecureTempFolder"
  19.  
  20.  
  21. Sub Plugin_Initialize 
  22. if RegPathExists(sPCheck) then
  23.    Call ReadRegistry()
  24. else
  25.  Call Disable()
  26. end if
  27. End Sub
  28.  
  29. Sub ReadRegistry
  30.    s=RegReadValue(sV1)
  31.    Call SetUIElement(1,s)
  32. End Sub
  33.  
  34. Sub Plugin_CheckData(ElementIndex)
  35. End Sub
  36.  
  37. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  38.  s=GetUIElement(1)
  39.  if right(s,1)<>"\" then
  40.     s=s & "\"
  41.  end if
  42.  
  43.  Call RegWriteValue(sV1,s,1)
  44.  
  45.  Call ReadRegistry()
  46. End Sub
  47.  
  48.  
  49.  
  50.  
  51. Sub Plugin_Terminate 
  52. End Sub
  53.